top_command (cmd_load currentFile [])
goal_command 1 cmd_give "λ x -> x"
goal_command 0 (cmd_context Normalised) ""
